Mth 351 Notes 



COC 3300 Computer 

(The following information refers specifically to the 
CDC 3300 computer, "and does not necessarily apply to other 
computers.) 



nl, 



A word is a storage element composed of 2k bits: j ! i * - * \ \ j 

6 _ 



Each word contains 4 6-bit- characters 



r 23 

6 6 



10 
o 



23 18 17 12 11 6 5 
Host instructions refer to words or portions of words. A 
few instructions refer to characters. 

Registers. A register is a storage element which has special 
purposesT The CDC 3300 has the following registers: 



9k 



15 



Ai 



Accumulator 



Bl f" 



1 ) 



2k 



Qf 



~1 Auxiliary accumulator, 82 
' or extension of A. 



11 



Index 



j fregi sters 



k8 



B3 



15 



E \ 



2k 



Double-length 
accumulator. Used 
in double -precision 
and floating point. 



y 



Register OOj 
file Oil 



1 



76] 
77 



/ 64 words. Some of these registers 
Faster than have special purposes. The 
main memory. others are available for 

temporary storage of data. 



/ 



Control Registers : These registers are in the control unit. 

. ,_ Program counter. 

. 12 1 Holds memory address 

p l J from which instruction 

' was obtained. 



■T 



2k 



-j Function register. 
J Holds instruction being 
performed. 
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Memory . The main memory consists of magnetic core storage 
with a K25/MS cycle time. 



00000 
00001 



77776 
77777! 




\ 32,768 
words 



There are 2 15 = 32,768 words of 
2k bits each, or 

2 1 ^= 131,072 characters of 
6-bi ts. 

Memory can be expanded to as 

18 
much as 2 = 262,144 words. 

Main rremory can hold instructions 
and data. 



Instruction Formats . Most instructions occupy one word, but 
some occupy two or three words. There are many different for- 
mats. In al 1 cases, the left-most six bits determine the 
operation (or group of operations). The format of the instruct- 
ion depends on which operation code is specified in the first 
6 bits. Here are some of the 1 -word instruction formats: 



Most 
word -addressed 
instructions 



1 2 



15 



23f 18 17 16 15 I4f 



operation 
code 



indirect bit 
= no effect 



A 



L 



1 = indirect addressing 

(fetch new bits 17-0 and 
repeat address calculation) 



word address 

index JOO = no modification 
field loi = add (Bl)to address 

[10= »' (B2) M 

111 = " (B3) 



Other 
word-addressed 
instructions 



operation 
code 



6 3 15 


I i 



23 Al8 171514 a 



sub-operation 







..word address (no index 
modification or indirect 
addressing) 
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Char acter -addressed 
instructions 



17 



C 



23 



1817 16 

■4\ 



operation 
code 



I 

f 



index 



character address 

= no modification 
1 = add (B1) or (B2) to 
^ address (depending 
on op code) 



Other 
instructions 



c 



15 



23 iv 18 17 15 1** 



t 



operation 
code 



sub-operation 



J 



other purposes (depend 
'ing on instruction) 



Arit hmetic . There is an optional Business Data Processor ID3P ; 
which can be added to the computer. This unit does decimal 
arithmetic and character handling. A1J_ other arithmetic in 
the 3300 is binary , one's complement arithmetic. 

In one's complement notation, the left-most bit determines 
the sign of a number. If the left-most bit is 0, the number 
is positive, if 1, negative. To change the sign of a number, 
all bits are changed (complemented). A11 zeroes (0000) de- 
notes +0, all ones (1111) denotes -0. A number can be 
lengthened by extending its sign bit: +5 = 0101=00000101, 
-5=1010=11111010. Addition is performed by simply adding 
two binary numbers, and if a carry occurs from the- left* -adding 
one to the right-most bit (end-around carry). 



i s 



In the 3300, if the result of an arithmetic operation 
-0, it is changed to +0. For example: milO (-1) 

+ 000001 



111111 

changed to I 
000000 



(+1) 
(-0) 

(+0) 



There are 3 modes of binary arithmetic in the 3300. 
The numbers indicate the number of bits in the operands and 
resul ts. 
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Sinqle-preci sion 
fixed point 



sdd? t:ion: ( ?-4)+{24)--»( 24) 



[Overflow sets'! 
subtraction: ( 24) -( 24) - ( 24} \an indicator / 
multiplication: (24)*( 24) ->(48) 
division: (48)/( 24) -» ( 24)quotient, 
( 24) remainder 



Double-precision 
f ixeb point; 



addition: (48}+(48)»>(48) /overflow sets; 
subtraction: (48) -(48)->(48) \an indicator/ 
multiplication: (48)^(48)^(96) 
division-. ( 96) /( 48 )-v( 48) quotient, 
(*+8) remainder 



Floatinq point addition, subtraction, multiplication, and 
division op erate on 48-bit floating point numbers: 



1 11 



36 



* 



sign-* t t 

exponent fraction 
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\ BCD . 
I code 
!(octal)j 



Card 
code 



; Key 
i Punch 
character charact|Br 



Line j 
L Printer 



00 



01 



02 



03 



04 



05 



06 



07 



10 



11 



12 



13 



14 



15 



16 



17 



20 



21 



22 



23 



24 



25 



26 



27 



30 



31 



32 



33 



3k 



o 







! k 



2,8 



1A 



k,8 



5,8 



6,8 



12 



12,1 



12,2 



12,3 



A 



JJAi 



12,5 



12,6 



12,7 



12,8 



12,9 



12,0 







12,3,8 



12,4,8 1 ) 



35 1 12,5,8 



36 112,6,8 

37 I 12,7,8 | 



4 



8 



H 



% 



7 ,8 jftLg &ARP ! [ 



A 



H 
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BCD 
code 
(octal) 



40 



41 



42 



43 



44 



45 



46 



47 



50 



51 



52 



53 



54 



55 



56 



57 



60 



61 



62 



63 



70 



71 



Card 
code 



Key 
Punch 



Punch |p rintel1 
qharactef charact j er 



11 



11,1 



11 ,2 



11,3 



11,4 



11,5 



K 



K 



■n 



M 



M 



11,6 







11,7 



11,8 



Q 



i^_ 



11,9 



11,0 



V 



1,3,» 



1,4,8| 



•* 



1,5,81 



T 



1,6,8 



is 



1,7,8 



Blank } Blank ! Blank 



0, 



0,2 



0,3 



/ 



/ 



! 64 


■ 0,4 


u 


1 u 


; 65 


; 0,5 


V 


! v 


i 66 


j 0,6 


w 


' w 


! 67 


■ 0,7 


X 


I X' 



0,8 



0,9 



■■ 72 


:0,2,8 


! ] 


i 73 


!0,3,8 


, 


i » 


! 74 


[0,4,8 


( 


I ( 


! 75 


j O,5,8 


i -» 


! 76 


10,6,8 




! ^r 


i 77 


;o,7,8 


i 


: /\ 
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Punched Cards . (Also called tabulating cards, tab cards, 
Hollerith cards, and IBM cards.) 

A punched card is a card 7 3/8" long and 3 1/V 1 wi . de 
which is used in various devices that can punch holes in 
such cards and/or sense the presence of holes. Usually, 
one side of the card is printed. When looking at the 
printed face of the card, one ■ wi 1 1 find that either the 
upper left or upper right corner is cut. The other corners 
may be square or rounded. See figure below. 



^ 











12 


or + 


, 


■ 








11 


or - 



1 12 


cut corner^ 












: rows 

• 
rs 



9 




1 2 3 


» • • 




no. «n 








80 columns 











There are 80 columns and 12 rows, defining 960 positions 
where holes may be punched in the card. There are two common 
ways of representing information in terms of punched holes. 
One way is the "binary" card. In this mode, any combination 
of holes may be punched, all combinations are meaningful. 
This mode allows a maximum of information to be punched into 
the card, but it is difficult for humans to interpret such 
cards. (Also, the presence of a large number of holes 
tends to weaken a card.) 



th" 



The other way of representing information is to use 
each column to represent a single character (digit, letter, 
or special character). This mode, which is called "Hollen 
or "BCD" uses a code of 1, 2, or 3 punches in a column to 
designate a character. Only certain combinations of holes 
are meaningful. There are 47 characters, plus blank (no 
punches), which are commonly used. See page 5 for a list 
of characters and the corresponding card codes. 

Card-handling machines . There are many different kinds of 
machines which can use punched cards, such as sorters, print- 
ers, etc. Here we shall be concerned with the following: 

Card reader . Attached to the CDC 3300 is a photoelectric 
card reader which can read 1200 cards per minute. This machine 
can read cards in either the binary or BCD modes, as commanded 
by the computer. However, if the first column of the card 
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contains a 7 and a 9 punch, the card is read as a binary card, 
regardless of which other holes may be punched. The table 
on page 5 gives the octal (so-called BCD) codes which the 
reader supplies to the computer when it reads a BCD card. 

Card punch . Also attached to the CDC 3300 is a card 
punch which can punch cards in either binary or BCD mode 
at a rate of 250 cards per minute. This relatively slow 
device is used primarily to punch binary forms of assembled 
and compiled programs. 

Key punch . A key punch has a keyboard with letters, 
digits, special characters, and various control buttons on 
it. The key punch can punch and/or read cards, feeding^ them 
from a hopper at the top right of the machine and stacking 
them at top left. Ther'e are a number of IBM key punches in 
the computer center, which are used by human operators to 
prepare punched cards. The key punches are used to punch 
programs and data for input to computers, or for use in 
other card machines. 

Line Printer . The principal output device on the CDC 3300 
is a line printer which can print as many as 136 characters 
on a line, at a rate of 1000 lines per minute. There are 
6'3 different characters which can be printed, plus blank. 
The chart on page 5 shows the characters that are available, 
and the octal (BCD) codes which must be sent to the print- 
er by the computer to print these characters. 

The printer prints 10 characters per inch on a line, 
6 lines per inch, 66 lines per page. (In ordinary usage, 
fewer than 66 lines are printed, to allow a margin at top 
and bottom of the page.) 

Input-Output Programming . The programming for the computer 
to handle input from the card reader and output to the line 
printer is rather complicated. To avoid these complexities 
(for a while, at least), we shall use a set of subroutines 
for input and output which are easy to use. These sub- 
routines are described on a later page. 



COMPASS 

COMPASS (COMPrehensi ve ASSembler) is an assembly pro- 
gram for the CDC 3300 which enables us to write programs 
in a symbolic form. The assembler translates the symbolic 
form into the actual binary operation codes and addresses 
which the computer can interpret. Thus, we use ADA to de- 
note "Add to A"; COMPASS translates ADA into the operation 
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code 10 (octal). We can use a symbol such as X as the name 
o? a storage location in memory; COMPASS translates this into 
an actual machine address. We do not need to know what the 
actual address is. 

In COMPASS, there is a set of pre-defined mnemonic 
operation codes (such as LDA, ADA, etc.) which represent 
machine Operation codes. There are also some -pseudo- 
Instructions" which tell COMPASS to reserve storage for 
data or to do various other things. Some of these sym- 
bolic instructions are listed on following pages. 

To refer to storage locations containing instructions 
or data, we use names' of our own choosing. These symbolic 
name! may consist of 1 to 8 letters, digits, or periods () 
of which the first character must be a letter. All symoois 
used n a program must be defined, either by appearing in 
the location field of some instruction, or by being declared 
as external to the program. 

. —>.~«~r. i «^^^*-^m />^n<;i <^t-s of a seauence of 

symbolic instructions. These are written one ^p e e , ana 
punched one per card. The card is divided into several 
fields, as illustrated below. 



LOCA TION 
8" 




1 



OP FR ATION, MODIFIERS '.ADDRESS FIELD \ COMMENTS 
j§ — ~ : 19120 : W|4l 72 



IDENT 

73~Sg 



i^at-i-rin fi'^ld- Columns 1 to 8. May be blank, or may con- 
tain a 1 to 8 c haracter symbol (see above) placed anywhere 
in the field. 

Column 9 . Must be blank. 

titration field. The mnemonic operation code or pseudo- 
?nftruction and any modifiers following it, must start in 
rnlumn 10 It is terminated by the first blank col urn. 
On! may also use a two-digit octal operation code in columns 
10 and 11. (If column 10 is blank, the operation field 
is assumed to be absent and is assembled as zero.; 

Address field . The address field may start anywher e f^f 
the blank that terminates the operation field but must start 
' later than column kO. It is terminated by the first 
Clank or cofurnn 73. The address field may consist o several 
*nh fields separated by commas. It usually contains a 
ymbo ! a decimal integer (positive.or negative), or an octal 
inteaer (positive or negative, consisting of J or more octal 
d^tffonowed by »B»), orjt -^consist of several of 
these items connected by "+" or "-" signs. The asterisk t ) 
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may be used in the address field like a symbol and repres- 
ents the location of the instruction itself. If the aadres* 
field consists solely of the notation ** , it wi 1 be 
assembled with the address field filled with 1-bits. 

Comments field . Comments or remarks may be written after 
the address field, up to column 72. 

Identi fication . Columns 73 to 80 are treated as a comment 
by COMPASS. This field is usually left bianK, or usea ,o. 
identification, or sequence numbers. 

Comment card . If column 1 contains an asterisk (*), the 
entire card is treated as a comment. 

Note: It is recommended that the address f^ld begin in 
ZoTUmn 20, and comments in column k\ , for legibility of the 
printed listing, 

Operation Codes 

Here we list some of the operation codes available in 
COMPASS. We include some jump, load, store, arithmetic, 
shift, and logical instructions. In the following table, 
the octal operation code is in the leftmost column, then 
the COMPASS mnemonic code, the form of the aodress (m means 
a memory address, k stands for a shift parameter), name 
and description of the operation. (A) denotes contents o» 
A, (Q) denotes contents of Q, etc. The arrow-* means 
"replaces the contents of". Thus, (m)-»(A) means that the 
contents of m are copied into the A register. A bar over 
a quantity (for example: (m)) denotes "complement of (all 
0-bits changed to 1-bits and vice-versa), (m+1) denotes 
contents of location m+1 (it does not mean contents of 
location m, plus 1 ) . 

Jump Instructions 

01 UJP m Unconditional Jump. Take next instruction from 

location m. (Jump to m.) 

00.7 RTJ m Return Jump. Store program counter (P) in 
' address field (bits 14-0) 

at location m, and take 
next instruction from 
location m+ 1 . 

03.0 AZJ,EQ m A Zero Jump, Equal. If (A) =0, jump to m. Other- 
wise, take next instruction 
in sequence (+0 and -0 are 
treated as 0.) 
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03.1 AZJ,NE m A Zero Jump, Not Equal. If (A) / 0, Jjmp to m. 

03.2 AZJ,GE m A Zero Jump, Greater or Equal. If (A) > 0, jump 

to m. (Does not jump if 
(A) = -0.) 

03.3 AZJ,LT m A Zero Jump, Less Than. If (A) < 0, jump to m. 

(Jumps if (A) = -0.) 

03.4 AQJ,EQ m AQ Jump, Equal. If(A) = (Q), jump to m. 

(+0 = -0) 

03.5 AQJ,NE m AQ Jump, Not EQual . If (A) j (Q), jump to m. 

(+0 = -0) 

03.6 AQJ,GE m AQ Jump, Greater or Equal. If (A) > (Q), jump 

to m. (+0 > -0) 

03.7 AQJ,LT m AQ Jump, Less Than. If (A) < (Q), jump to m. 

(+0 > -0) 



Load and Store Instructions 

20 LDA m Load A. (m) ~KA) . 

2k LCA m Load Complement A. (m) — MA). 

25 LDAQ m Load AQ. (m)->(A), (m+ I) — »(Q ). 

26 LCAQ m Load Complement AQ. (m) — >(A), (m + I) — >(Q) . 
kO STA m Store A. (A)— >(m). 

k\ STQ m Store Q. (Q)— >(m). 

45 STAQ m Store AQ. (A)— »(m), (Q)—»(m+l). 

55.3 EAQ E to AQ. (E)-KAQ), (No address field.; 

55.7 AQE AQ to E. (AQ)~ *(E). 

Arithmetic Instructions 

30 ADA m Add to A. (A) + (m)— »(A). 

31 SBA m Subtract from A. (A) - (m)— >(A). 

32 AOAQ m Add to AQ. ( AQ) . + (m, m + 1 ) — ■>( AQ; . 

33 SBAQ m Subtract from AQ.(AQ) - (m, m + 1)~>(AQ). 

50 MUA m Multiply A. (A) * (m)--KQA).<. 

51 DVA m DIVIDE A. (AQ) / (m)-— >(A), remainder to (Q). 

56 MUAQ m Multiply AQ. (AQ) * (m,m+1 )— >( AQE) . 

57 DVAQ m DIVIDE AQ. ( AQE)/(m,m+l ) — >(AQ) , remainder 

— > ( E) . 

Shift Instructions 



12.0 SHA k Shift A. If k > 0, shift (A) left end-around 

k places. 
If k < 0, shift (A) right sign-extended 
-k places. 
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Shift Instructions (cont.)., 

12.4 SHQ k Shift Q. Same as SHA, except shift (Oj. 
13.0 SHAQ k Shift AQ. Same as SHA, except shift (AQ). 

Lo a i ca 1 In s tructions 

27 LDLm Load Logical, {Q)A(m)^U). 

35 SSA m Selectively Set A. (A)V(m) -> ( A) . 

36 SCAm Selectively Complement A. (A)V(my w (A). (Exclusive 
37. LPA m Logical Product A. U)A(m) -> ( A) . 

Ps el jck> Ins tructions 

Here we list some of the more important pseudo instruct 
ions in COMPASS. 

<blank> IDENT m 

The first instruction of each subprogram must be arv 
IDENT. The 'W' here is the name of the subprogram (8 char- 
acters or less) . 

<blank> END m 
th^ last instruction of each subprogram must be an END. 

if this subprogram is not to receive control from bLUKt. 
<blank> FINIS <blank> 

This instruction immediately follows the END of the 
last Iubprogram U to be assembled It terminates assembly 
and causes COMPASS to return control to SCOP... 



<blank> ENTRY m 1 ,m 2 , 



... j 



m 



n 



, -, annpan'na in the address field 

The symbols m^nu, ... appearing m 

£ cutdv rarri arp declared as entry points to the sub- 

of an ENTRY card are °®ciar~u « hp Y e f erre d to b Y other 
program, which means that they can be re.erreu tu y 
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subprograms. These symbols must be defined in this sub- 
program. 

<btank> EXT m )' m 2' * s0 * m n 

The symbols m ,A, ...are symbols used in address fields 
of instructions in 1 th?s subprogram, which refer to entry 
points of other subprograms. They must not be defined in 
this subprogram, 

<symbol or blank> BSS m 

This instruction reserves m words of storage space 
in the subprogram. If a symbol appears in the oca ion 
field, it is defined as the address of the first word or 
the block of words reserved. 

<symbol or b1ank> OCT m^n^, ... ,m n 

t^« . m . ... are sianed or unsigned octal integers, 
of 1 toYoctal' digits. They are assembled into consecutive 
words in the program. If a symbol appears in the locat on 
field, it is defined as the address of the first octal in- 
teger. 
<symbol or blank> DEC m^n^, ... ,m n 

Similar to OCT, except that decimal integers are con- 
verted to binary form and assembled into the program. 

Input-OUtput Subroutine 

it is called. See page 5 for the codes supplied for various 
cha acters Where "there is a string of consecutive blank 
on the card, INCHAR returns only one blank. INCHAR supplies 
a blank at the end of each card. 

Calling sequence: RTJ ! NC y™? , r „ nf *, ,_ P „<| 
Returns with next character in (A> 5 . (rest of A zero). 

The Last Character In is also in location LCI. 
~ Clobbers Q. Restores B1, B2, B3. 

To check for End-of-Fi1e, store an address in location 
CHEOF When an end-of-file card is read, the subroutine 
will jump to Ihis address. (For example, to cause jump 
to EOFCHK when EOF is read, do the instructions ENA EOFCHK, 
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SWA CHEOF .) This should be done before first call on 
INCHAR, If it is not done, an end -of -file will cause 
abnormal termination of job. 

OUTCHAR (Entry Points! OUTCHAR, LCO, OUTLINE, OUTPACE.) 
OUTCHAR, OUTLINE, and OUfPAGE are three subroutines 
which provide for printing outputs on the line printer. 
Characters to be printed are supplied one at a time to 
OUTCHAR* OUTCHAR stores these characters in a buffer 
(an area of memory). When 100 characters have been stored, 
OUTCHAR causes the line to be printed, and resets, ready 
for another 100 characters. OUTLINE can be Called to 
print Whatever is in the buffer* OUTPAGE is called to 
eject the paper to the top of the next page. 

Calling sequence: 

Character (A) r „ (Rest of A does not matter.) 

RTJ OUTCHAR 

Stores character in buffer* prints" 1i fie"' if 'TOO characters 
have been supplied since last line was printed. Last 
Character Out is also stored in LCO. Clobbers A and Q, 
restores BT, B2, and B3* 

Calling sequence! RTJ OUTLINE 

Causes a line to be printed, containing the characters 
which have been supplied to OUTCHAR since last line was print- 
ed. If no characters have been supplied, prints blank line. 
Clobbers A, Q, restores Bl , B2, B3. 

Calling sequence: RTJ OUTPAGE 

If any characters have been supplied to OUTCHAR 
since last line was printed, causes a line to be printed. 
Then causes the paper to be ejected to the top of the next 
page. The next line will be printed about one inch from 
the top of the new page. Clobbers A, Q, restores Bl, B2, 
B3. 

INDEC (Entry points: INDEC, NODIGS.) 

INDEC reads characters from INCHAR and converts a 
positive or negative decimal integer to binary form, 
allowing up to 48 bits in the binary form. (Maximum 
size of decimal integer: 140, 737, 488, 355, 327.) 
INDEC begins by examining the character in LCI (Last 
Character In). It ignores all characters until it gets 
a minus sign (-) or a decimal digit. Then it accepts 
decimal digits, converting to binary, until it receives 
a character from INCHAR that is not a decimal digit, 
If the number was preceded by a minus sign, the decimal 
integer is complemented (after converting to binary). 



Mth 351 Notes P a 9 e llf 

Calling sequence: RTJ INDEC 

Returns with binary equivalent of decimal integer 
in AQ. The terminating character is in LCI. The number 
of digits that the number contained (counting leading 
zeroes, if any) is in location NOOIGS. Clobbers E. 
Restores Bl, B2, B3. 

OUTOEC (Entry point: OUTDEC.) 

OUTDEC accepts a *f8-bit positive or negative binary 

integer, which it converts to a decimal integer with sign, 
and outputs it to OUTCHAR. The sign ( + or -) is printed 
first, then the decimal digits with leading zeroes sup- 
pressed (at least one digit is printed). A space (blank) 
is output after the number. If the current line does not 
have enough room left for the number, OUTDEC calls OUTLINE 
to print the current line, and the number will be printed 
on the next line. This avoids "splitting" a number on 
two lines. 

Calling sequence: Binary integer— > (AQ) 

RTJ OUTDEC 
Clobbers A, Q, E. Restores Bl, B2, B3. 
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Debugging Aids , We. have two subroutines which can be called 
to print contents of registers and of selected areas of mem- 
ory. Call's.. to- these subroutines can be inserted at various 
places in a program to obtain information which may .be of 
help in determining what is wrong with the program. The 
subroutines are described below. 

REGDUMP (Entry point: REGDUMP.) '■-,..- 
Calling sequence? RTJ REGDUMP 

REGDUMP first saves the contents of various registers. 
Then it calls OUTLINE to print any characters which may have- 
been given to OUTCHAR. It next prints one line giving the 
contents (in octal) of P, A, Q, E, Bl , B2, B3. (The value 
of P is the octal location of the instruction following 
the RTJ REGDUMP.) Finally, REGDUMP restores the contents 
of the registers and returns to the program. 

(Be sure to declare REGDUMP as external if you insert 
calls to REGDUMP into a program.) 

MEMDUMP (Entry point: MEMDUMP.) 

Calling sequence consists of three words: 



RTJ 


MEMDUMP 


00 


FWA 


00 


LWA 



Like REGDUMP, MEMDUMP saves the registers and calls 
OUTLINE. Then it prints a line giving the value of P 
in octal (which is the location of the word following the 
RTJ MEMDUMP.) Next it prints (in octal) the contents of 
all the memory locations from FWA (Fjrst Word Address) to 
LWA (Last Word Address), inclusive. These are~~printed 
8 words per line, with the octal location of the first 
word in each line printed at the left of the page. FWA 
and LWA can be any symbolic locations in the program. 
(Usual COMPASS address expressions may be used.) Finally, 
the registers are restored, and control is returned to the 
instruction following the 00 LWA. 

Be sure to declare MEMDUMP as external. The memory- 
map will be useful in determining the correspondence be- 
tween symbolic addresses and the absolute (octal) address- 
es printed by MEMDUMP. 

COMPASS Error Messages . If there is an error in a line 
of a COMPASS program, an error flag (a single letter) is 
printed at the left of the listing. Here are some of the 
error flags which you may encounter. (It is possible to 
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have more than one error in the same line.) 

A Address field error. ^ 

D Duplicate symbol (symbol defined more than once), 

L Location field error. 

M Modifier subfield of operation code field is in error. 

Operation code error. 

U Undefined symbol in address field. 

If any errors are detected by COMPASS, the program will 

neither be loaded nor run. 

More Input-Output Subroutines 

OUTOECF (Entry point: OUTDECF) 

OUTDECF accepts a ^8-bit positive or negative binary 

integer, which it converts to a decimal integer, and out- 
puts it to OUTCHAR. The format of the output may be 
controlled by two numbers, n and c, which are specified 
in the word following the RTJ OUTDECF . OUTDECF will 
print n digits, or more if necessary to represent the 
number correctly. If c = 0, the sign ( + or -) v/i 1J be 

~~Z~+.~A 1 •-» -P^i-M-*4- /-%-P t-ho nrimhia** lAaitjinQ 7*=>rO£'S 111" SttV ) 

are converted to blanks (and the sign is moved over ac- 
cordingly), and a trailing blank is output. Other values 
of c have the following effects: 

c = 1: does not convert leading zeroes to blanks 

(prints zeroes), 
c = 2: does not print the sign, 
c = hi does not print the trailing blank. 

Combinations of these effects may be obtained by adding 
the values given above. For example, c = 3 has the 
effect of both 1 and 2. 

If the current line does not have enough room for 
the number, OUTDECF calls OUTLINE to print the current 
line, and the number will be printed on the next line. 

Cal ling sequence: 

Binary integer ~~ HAQ) 

RTJ OUTOECF 

00 n, c (0 < n < 3U < c < 7) 
Clobbers A, Q, E. Restores Bl, B2, B3. 

I NO (Entry point: IND) 

IND reads characters from I.NCHAR and converts a 
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all characters until it gets a minus sign (-}, a decimal 
digit, or a point (.). Then it accepts decimal digits, 
a/ point (if it hasn't already gotten one) , and more digits. 
When a non -digit, non -point is received from INCHAR, it 
converts the number to a 24:24 binary number, and comple- 
ments it if a minus sign preceded the number. Decimal 
numbers to be read by IND may start with a minus sign or 
no sign. (A plus sign would be ignored.) They may cont- 
ain from to 7 digits before the point and from Oto 1 
digits after the point. The point" may be omitted if the 
number is an integer. The integer portion must not exceed 
8388607 in magnitude, and the fraction portion must not 
exceed .9999999 . There must not be any blanks in the 
middle of the number, and the number must be entirely 
on one card. 

Calling sequence: RTJ IND 

Returns with 24:24 binary equivalent of decimal 
number in AQ. The terminating character is in LCI. 
Clobbers E. Restores Bl , B2, S3. 

Another Output Subroutine 

OUTD (Entry point: OUTD) . 

OUTD accepts a 24:24 fixed point binary numoer, which 

it converts to decimal form with sign, and outputs it to 
OUTDECF and OUTCHAR. The sign (+ or -) is always printed. 
7 digits are printed before the point (leading zeroes are 
converted to blanks), and 7 digits are printed after the 
point. A trailing blank is output after the number. OUT- 
LINE is called before printing the number if there is not 
enough room left on the current line for the number. 

Calling sequence: 24:24 binary number — » (AQ) 

RTJ OUTD 
Clobbers A, Q, E. Restores Bl , B2, 83. 

Fixed -point Arithmetic 

One method of using a computer to calculate with num- 
bers that are not integers is the technique known as "fixed 
point arithmetic". In this method, one assumes that each 
number has a point somewhere in it, and programs the comp- 
uter to handle the numbers properly. In general, the tech- 
nique requires shifting numbers to line up the points be- 
fore adding or subtracting, and shifting operands in mult- 
iplication and division so as to get the proper results. 
Here we shall discuss a special case of fixed point arith- 
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metic for the COC 3300 in which the point is in the same place 
in all numbers. This will simplify things, although it poses 
some restrictions on the range and accuracy of numbers we 
can handle. 

In this fixed point scheme, we shall use 2 words (48 
bits) for each number, and we shall suppose that the point 
is between the two words. This means we have 24 bits be- 
-F« re i-he po-»nt (integer part), and 24 bits after it (frac- 
tion part), so we shall refer to this as "24:24 arithmetic". 
Of course, the left-most bit is the sign bit, so we really 
have only 23 bits for the magnitude of the integer Potion. 
This allows our numbers to range from -8388607 to +83886O7, 
and to have an accuracy of 24 bits in the fraction, which 
is roughly equivalent to 7 decimal places. 

Let us now show how to do arithmetic operations with 
24:24 numbers. In each case below, we shall assume we want 
to do our operation with two 24:24 operands X and Y, and 
store the 24:24 result in Z. In actual practice, one of 
the operands ma x/ already be in AQ, or we may wish to do 
further calculations with the result and not bother stor- 
i ng it. 

Addition and subtraction are very simple, since the 
point is in the same position in both operands, and no 
shifting is required to line up the points. 

add subtract 

LDAQ X LDAQ X 

ADAQ Y SBAQ Y 

STAQ Z STAQ Z 

In multiplication, we multiply two 24:24 numbers, and 
get a 48:48 result (the number of places after the point 
in the result is the sum of the number of places after the 
points in the two operands). This result is in AQE with 
the point between AQ and E. It would be nice if we could 
simply shift AQE left 24 places to put the point between 
A and Q, where we want it to be. Unfortunately, the 3300 
does not have any instructions that shift AQE. So, we 
have to do something like the following: 



mul ti 


ply 


LDAQ 


V 
A 


MUAQ 


Y 


EUA 




SHAQ 


24 


STAQ 


Z 
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Division is a little more complicated. We^want to 
olace the numerator (dividend) in AQE as a 48:48 number, 
and then divide it by the denominator (divisor), which 
is a 24:24 number. This will give us a 24:24 quotient in 
AQ, which is just the result we want* The numerator must 
have its upper half placed in (Q) and its lower half in 
(E uoper). (A) and (E lower) should be filled with sign 
bits'. Here is one method of doing this: 



A 



'U 



'L 



signs num ber signs 



divide 



Upper half of X to (Q) . 
Generate sign bits in (Q), 
Lower half of X to (A) . , 
(AQ) to (E), sets up (E) properly. 
Upper half of X to (A) . 



-24 Shift into (Q), filling (A) with sign bits. 



LDQ X 

SHQ -23 

LDA X+1 

AQE 

LDA X 

SHAQ _- 

r\\ti\n v r» •;»/-; ri^ hw v fat- last! j 

STAQ Z Store the quotient. 
(A shorter method is shown below.) 

Combined multiplication and division . We note that 
the result of a multiplication is a 4<3:4d number in AQE, 
and that this is exactly the form required for the num- 
erator of a division. Hence, if we have to do a multip- 
lication followed by a division, we can save a lot of 
trouble. Suppose we wish to compute W:=X*Y/Z, where 
X, Y, Z, and W are all 24:24 numbers. Here is how we 
can do it: 



LDAQ X 
MUAQ Y 
DVAQ Z 
STAQ W 



X to (AQ). 

X*Y in 48:48 form in (AQE). 
X*Y/Z in 24:24 form in (AQ) 
Store result. 



This suagests a simpler way of doing division. To 
compute Z:=X/Y, we could rewrite it as Z:=1*X/Y and do 



the fol lowing: 



ENA 
ENQ 
MUAQ 
DVAQ 

STAQ 



1 These two instructions place 
in 24:24 form in (AQ). 

X 1*X in 48:48 form in (AQE). 

Y 1*X/Y in 24:24 form in (AQ). 

Z Store result. 



a 1 



This requires fewer instructions than the method suggested 
above, but it might take a little more time, since the MUAQ 
instruction takes more time to do than instructions such as 

LDA and SHAQ. 
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etc 



Constants . One can use the DECD pseudo-instruction 
to cause COMPASS to assemble 24:24 constants and pi ace them 
in a program. One must not use a decimal point in such 
constants, because COMPASS will assemble a floating point 
constant if a decimal point appears. We must express the 
number as an integer with a power of ten factor (03, 0-5, 
and binary factor B24. Here are a few examples. Suppose 
we wish to have the constants 3, 400, 5.87, -.0042, -12, 
and -83,5 stored in our program in 24:24 form. This could 
be done with the following instruction: 

DECD 3B24,4D2B24,587D-2D24,-42D-4B24,-12B24,-835D-1B24 

Each constant will occupy two words and they will be stored 
in consecutive locations in storage. 

Square root . Here we give a square root subroutine 
for 24:24 numbers, to illustrate some programming techniques. 
The subroutine uses Newton's method, in which a new appro- 
ximation XNEV/ is computed from the old one X0LD by the for- 
mula XNEW :=(X0LD + Y/X0LD)/2, where Y is the number whose 
square root is sought' This formula is applied repeatedly 
until the new and old approximations are nearly the same. 

The calling sequence for the subroutine is: 

24:24 number (Y)— >(AQ) 

RTJ SQRT 
24:24 result (vf)~»( AQ) 

If Y is negative, the subroutine simply returns with the 
original number Y in AQ. 



/ 9 



SQRT 



LOOP 



UJP 


** 


AZJ,LT 


SQRT 


STAQ 


Y 


SCAQ 





AZJ,EQ 


SQRT 


LDAQ 


INIT 


UJP 


L00P+1 


LDAQ 


XNEW 


STAQ 


X0LD 


LDAQ 


Y+l 


AQE 




LDAQ 


Y-l 


DVAQ 


X0LD 


ADAQ 


X0LD 


SHAQ 


-1 


STAQ 


XNEW 


SBAQ 


X0LD 


AZJ,NE 


LOOP 


SHAQ 


22 


AZJ,NE 


LOOP 


LDAQ 


XNEW 


UJP 


SQRT 



If Y < 0, forget it! 

Save Y. 

Scale Y to test for zero. 

If Y = 0, we are done already 

Initial X0LD is 1 . 

Go to LOOP. 

Pick up XNEW to use as X0LD . 

Set X0LD. 

Set up Y. 

in (AQE) for 
division. 
Divide Y by X0LD. 
Add X0LD to result. 
Divide by 2. 

Store new approximation. 
Subtract X0LD for comparison. 
If XNEW-X0LD is not 

very smal 1 , do 

another iteration. 
It is small, return with 
answer in (AQ) . 
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(Square Root Subroutine, cont.) 



INIT 
XOLD 
XNEW 



OCT 

3SS 

OCT 

DECD 

BSS 

BSS 







1B24 
2 
2 



Input. Here we give the program and flow chart for 
the 24:24 input subroutine IND, described on page 16. 

EXT LCI,INCHAR,INDEC,NOOIGS 



IND 


UJP 


** 




ENA 







STA 


SIGN 




IDA 


LCI 


TO 


ASG 


10 




It ID 


mr. 




\J v«i 


U# J. V*l 




ASE 


if OB 




UJP 


NM 




ENA,S 


-0 


RD 


STA 


SIGN 




RTJ 


INCHAR 




UJP 


TO 


NM 


ASE 


33B 




UJP 


NP 




ENA 







STA 


INT 




UJP 


RF 


NP 


ENA 







UJP 


RD 


DIG 


RTJ 


INOEC 




STQ 


INT 




LOA 


LCI 




ASE 


33B 




UJP 


NF 


RF 


RTJ 


INCHAR 




ASG 


10 




UJP 


FR 


HF 


ENQ 







UJP 


ITA 


FR 


RTJ 


IND EC 




STAQ 


FRAC+1 




IDA 


NODIGS 




SHA 


1 




ADA 


DV 




STA 


DIV 




LDAQ 


FRAC+2 




AQE 






LDAQ 


FRAC 



Zero to Sign Flag. 
Pick up Last Character 
Is character 

Y<=><; . an read 

No. Is it a 

No. 

Yes, set sign flag to one's 



In. 
a digit? 
integer part, 
minus sign? 

i 



Fetch next character, 

Go and test it. 

Is character a point? 

No. 

Yes, put zero in 

integer part. 
Go look for fraction part. 
Set sign flag to zero. 

Read integer part 

and store it. 
Check Last Char In. 
Is it a point? 

No, there is no fraction part. 
Yes, read next character. 
Is it a digit? 
Yes, go read fraction part. 
No, zero to fraction part (Q). 

Read fraction part 

and store it. 
Get no. of digits in fraction. 
Multiply by 2. 
Add to divide instruction. 
Store modified divide instr. 
Put fraction part 

in (AQE) FOR 

division. 
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DIV 00 
ITA IDA 



DV 



INT 
SSH SIGN 
UJP IND 
X0A,S -0 
X0Q,S -0 
UJP IND 
DVAQ PT-2 



nrrn in 1HH 1 AHH 1 Qk 

DECD 1D5JD6JD7 



Divide by 10*N0DIGS 

Pick up integer part. 

Test sign flag* 

F1ag=Q, number is positive. 

Flag=1, change 

sicjn of number* 
Return. 

Divide instruction to be modified 
Table of powers 
of ten. 



SIGN BSS 
INT BSS 
FRAC OCT 



1 
1 

0,0,0,0 



Sign flag* 

Storage for integer; 

Storage for fraction. 

FLOW CHART 



"+■ 



i gn ; 




< si gn ; >-] 

J" 7: ,-| 

| AQ — » AQ J j 
( return ~^ 



_^ 



no 



{ 3V^.< CHAR="- i, ?>-n 
i yes 



/" 



LCT=". "TV- 



no 



f: 



•SIGN | | 



®-*L- 



;y es 




r" 



NkL 



INCHAR 



A 






I 



yes 



.1 no 



I ! »»+'« 



->SIGN j ; 



■■v" 







INT 
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Floating Point Arithmetic 

"Floating Point' 1 is the name given to a method of 
doing calculations in a computer, which provides for a 
wide range of values of numbers with a reasonable amount of 
accuracy, and eliminates problems of shifting, etc.; which 
are present in fixed point arithmetic. Floating point is 
analogous to the "scientific notation" which is often usee 
in dealing with very large and very small numbers. For 

example, one writes 3.708*10 20 instead of writing a 21- 
digit number. In a binary computer, it is more convenient 
to use a power of 2 as a factor instead of a power of 10. 
There are various ways to represent floating point numbers 
in computers. Here we shall discuss the scheme used in 
the CDC 3300, which is a fairly typical method. 



In the 3300, a non-zero number x 
floating point by finding a fraction f 



is represented in 
and an integer p 

such that x = f * 2^ , and 1/2 < |f | < 1 . If P is in 
tne range -iuzj — P ~ tiu^; , mc numuci v»«n *~>*~ > v,^- ~~~. .>.<=;- 
in 3300 floating point. If not, the number is too large 
(overflow) or too small (underflow) to be represented. 
This means that x itself must be in the (approximate) range 
]0 -30S < | x | < ] Q 30Q ^ A S p ec i a i case is the number 0, 
which is represented by taking f = and p = -1023, which 
turns out to be "all 0" in the machine representation. 

The machine representation of a floating point number 
in the 3300 occupies 2 words, of which 11 bits are used for 
the exponent (p) and 37 bits are used for the fraction (f). 
One problem is that both f and p need a "sign bit , 
since either may be positive or negative. This problem 
is solved by representing f in usual one's complement 
notation, and by "biasing" p so as to make it appear 
positive. If p is negative, it is biased by adding 
1777o to it; if it is non-negative, the bias is 2000g. 

Here is a chart showing how various values of p are 
represented: 



true 
exponent 
(decimal ) 

+ 1023 
+ 1022 



true 
exponent 
(octal ) 

+ 1777 
+ 1776 



+0002 
+0001 
+0000 



biased 
exponent 
(octal ) 

3777 
3776 

2002 
2001 
2000 



true 
exponent 
(decimal ) 


1 

-1022 
-1023 



true 

exponent 

(octal ) 

-0000 
-0001 
... 
-1776 
-1777 



biased 

exponent 

(octal) 

1777 * 
1776 

• C » 

0001 
0000 



see next page 
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* (From previous page) A biased exponent 01 minus zero 
(1777) is handled correctly by the machine's circui ts,^but 
is not generated as a result of a floating point operation. 
That is, a zero exponent will always come out "plus zero" 
(2000). 

As can be seen, the biased exponents range from ^ 0000 
(reoresenting -1023) to 3777 (representing +1023), with 1777 
not' used. It thus requires 11 bits to represent the expo- 
nent. These 11 bits are placed between the sign bit of the 
fraction and the other 36 bits, as shown below: 

1 1 1 36 



[I 



si gn 



bit biased fraction 



of fraction exponent 

A positive number has a "0" in the sign bit, the biased 
exponent as described previously, and the 3d bits denoting 
the magnitude of the fraction. A negative number is the 
one's complement of the positive number of equal magnitude. 
That is, in changing the sign of a floating point number, 
all 46 bits (including the exponent) are complemented. 
Here are some example: 

+ 1 = .1*2 1 = .100 2 *2 1 = .i+ 8 *2 1 = 2001400000000000 8 

+2.375= 10.011 2 = .10011 2 *2 2 = .100110 2 *2 2 = .^6g*2 2 

= 200246000000000G 
+ .1875= .0011 = .110 *2" 2 = .6 *2" 2 = 1775600000000000 

Z Z O 

-1 = 5776377777777777 -2.375 = 57753177777777777 

-.1875 = 6002177777777777 .5 = 2000400000000000 .25 

= 1776400000000000 

As a result of this manner of representing floating 
point numbers, one can test a floating point number for 
positive, negative, non-zero, or zero by testing the upper 
half of it (AZJ,LT for example). If one "looks" at float- 
ing point numbers as if they were fixed point, larger 
numbers look larger than smaller ones. 
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Arithmetic with floating point numbers requires special 
actions. This can be done either by subroutines (software) 
or by special circuits (hardware). In the 3300, floating 
point hardware is available at extra cost (the OSU machine 
has this hardware). When this is present, one can use the 
floating point instructions (FAD, FSB, FMU, FDV) to operate 
on floating point numbers. These instructions all operate 
on two floating point numbers, one of which is in AQ,^the 
other being in M and M+ 1 (two consecutive worus in 
memory). The result is a floating point number in AQ. All 
four instructions use the E register. Indirect addressing 
and index modification can be used, if desired. 

FAD M (AQ) + (M,M+1)— >(AQ) FMU M (AQ)*(M,M+1 )~>(AQ) 

FSB M (AQ) - (M,M+1) ~>(AQ) FDV M (AQ)/(M,M+1) ~>(AQ) 

In working with floating point numbers, one uses LDAQ 
to load a number, LCAQ to load' the negative (complement) of 
a number, and STAQ to store a number. ^ One can use [X0A,S -0 ; 
X0Q,S -0] to change the sign of a number in AQ. To com- 
pare two floating point numbers X and Y , one can do 
LDAQ X ; FSB Y ; AZJ,LT ., (or AZJ,NE , AZJ,GE , or AZJ,EQ). 

Cons tants . One can use the DECD pseudo-instruction to cause 
UOMPaSS to assemble floating point constants and place them 
in a program. Such constants must contain a decimal point. 
A power of ten scale factor (Dj may be used, but not a bi- 
nary factor (B). For example, to have the constants 3, 400, 

5.87, -.0042, -12, -83.5, -4*10~ 15 , and 3.09*10 32 stored 
in a program, we can write: 

DECD 3., 4. 02, 5. 87, -.0042, -12., -83. 5, -4. D-l 5, 3. 09D32 

Each floating point constant will occupy two words and 
they will be stored in successive loacations in storage. 

Square root . Here is a square root subroutine for float- 
ing point numbers. It uses Newton's method, the same as 
the fixed point subroutine (page 20). The calling sequence 



is 



Floating point number (Y)— >(AQ) 

RTJ FSQRT 
Floating point result (\/Y) in (AQ) 



Mth 351 Notes 



page 26 



If Y is negative, the subroutine returns with the original 
number Y in AQ. 



FSQRT 


UJP 


*# 




AZJ,LT 


FSQRT 




AZJ,EQ 


FSQRT 




STAQ 


FY 




SHA 


1 
- 1 




ADA 


HBIAS 




SSA 


FB 


FLOOP 


STAQ 


XOLD 




LDAQ 


FY . 




FDV 


XOLD 




FAD 


XOLD 




FDV 


=2D2*0 




STAQ 


XNEW 




SBAQ 


XOLD 




AZJ,NE 


NOTYET 




cimn 


22 




inM^ 




AZJ,EQ 


DONE 


NOTYET 


LDAQ 


XNEW 




UJP 


FLOOP 


DONE 


LDAQ 


XNEW 




UJP 


FSQRT 


HBIAS 


OCT 


1O0OOO00 


FB 


OCT 


4000 


FY 


BSS 


2 


XOLO 


BSS 


2 


XNEW 


BSS 


2 


Float and 


Fix. 1 


-iere are su 



If Y < 0, return. 

If Y = 0> we are done. 

Store Y. 

Shift riaht 1 and add 1/2 bias 

to divide exponent by 2. 
Set left-most fraction bit to 1. 
This is our initial approximation 
Set XOLD* 
Fetch Y, 

Divide by quotient* 
Add XOLD to quotient* 
Divide by 2* 

Store new approximation. 
Subtract XOLD for comparison* 
If XNEW and XOlD are mot almost 

*-k<=» came* Ho annt-hi=*r i teration. 

If they are, we are done. 
Pick up XNEW and 

repeat loop. 
Pick up answer (XNEW) 

and return. 

Half of bias (2000). 
Left-most bit of fraction. 



subroutines for converting 24:24 

fixed point numbers to floating point and vice-versa. The 
calling sequences are: 



24:24 number— >(AQ) 

RTJ FLOAT 
Float, pt. equiv. in 



(AQ) 



Float, pt. number—* 

RTJ FIX 

24:24 equiv. in (AQ) 



(AQ) 



The FIX subroutine does not check for overflow or under- 
flow; it will give an erroneous result if the floating 
point number is too large or too small to be represented 
in 24:24 form. 
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FLOAT 



RBI 



UJP 
STI 

AZJ,EQ 

SHAQ 

STA 

TIA 

I*. I A 
IMA 

ANA 
SHA 
SCA 

EN I 
UJP 



RBI , 1 

RBI 

-11 

X 

1 

200GB 

3777B 

12 



FLOAT 



Save B1 . 

Scale number. 23-(no. of shifts) 

If number is zero, we are done, 

Posi tion fraction. 

Save upper half. 

Bi— >Ai (True exponent.) 

A A /A hi syc • 

Eliminate stray bits. 
Shift to position exponent. 
Assemble number. Exponent is 

complemented if number is negative. 
Restore B1 . 
Return. 



*B1 



FIX 



PLUS 



RX1 



UJP 

AZJ,EQ 

STI 

STA 

AZJ,GE 

X0A,S 

X0Q,S 

STA 

SHA 

INA 

TAI 

LDA 

ANA 

SHAQ 

SSH 
UJP 
X0A,S 

EN I 
UJP 



*■* 



FIX 
RX1,1 



-0 

-0 

X 

-12 

76000B 

1 

X 

7777B 

-12,1 

S 
RX1 

-0 

**,1 

FIX 



If number is zero, return. 
Save B1 . 
Remember sign 



1 I 1 IUI1IUCI 






complement it to 

make it positive. 
Save upper half of number. 
Shift exponent to right end of A. 
Remove bias to get true exponent. 
Put it in Bl . 

Pick up upper half of number. 
Wipe out the exponent. 
Shift [(true exponent) -1 2] places 

to position number. 
Test sign of original number. 
It was +, we are done. 
It was -, we have to 

complement the number. 
Restore B1 . 
Return. 



BSS 
BSS 



1 



Storage, 
ii 



